/*
 * Copyright (c) 2018-2023 北京华恒盛世科技有限公司
 * QUICKPOOL is licensed under Mulan PSL v2.
 * You can use this software according to the terms and conditions of the Mulan PSL v2.
 * You may obtain a copy of Mulan PSL v2 at:
 *     http://license.coscl.org.cn/MulanPSL2
 * THIS SOFTWARE IS PROVIDED ON AN "AS IS" BASIS, WITHOUT WARRANTIES OF ANY KIND,
 * EITHER EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO NON-INFRINGEMENT,
 * MERCHANTABILITY OR FIT FOR A PARTICULAR PURPOSE.
 * See the Mulan PSL v2 for more details.
*/

#include "xdrbase.h"
#include "channel.h"
#include "api.h"

/**
 * @brief       API: move job to a new position for scheduling.
 *
 * @param[in]   movereq      #1: move job request key values
 * @param[in]   master       #2: master(port and name) to be called
 *
 * @retval      > 0          #1: succeed, new position of the job
 * @retval      -1           #2: failed
 *
 * @note        When failed, error message is printed out in this API.
 */
int 
client_movejob(struct request *movereq, struct poolMaster *master)
{
    if (NULL == movereq || 0 == movereq->number) {
        log_message(ERR, NOCLASS, "%s: Must specify move job request.", __func__);
	return -1;
    }

    // check the first key to avoid unknown request from client.
    if (REQUEST_KEY_REQUEST_CODE != movereq->keyvalues[0].key) {
        log_message(ERR, NOCLASS, "%s: First key must be request code for move job request.",
                    __func__);
	return -1;
    }

    struct auth auth;
    gf_set_auth(&auth, commandParams[AUTH_KIND].string_value);

    unsigned int size; // for calculating the size of the request.
    size = gf_xdrsize_request(movereq);
    size += gf_xdrsize_auth(&auth);
    size += HEADER_LEN;

    char *request;
    request = (char *)calloc(size, sizeof(char));
    if (NULL == request) {

        log_message(ERR, NOCLASS, STR_FUNC_D_FAIL_M, __func__, "calloc", size);
        gf_xdr_free(gf_xdr_auth, (void *)&auth);
        quickpool_errno = ERROR_MEMORY;
	return -1;
    }

    XDR xdrs;
    xdrmem_create(&xdrs, request, size, XDR_ENCODE);

    struct header tohdr, outhdr;
    gf_init_header(&tohdr);
    tohdr.reqcode = BATCH_JOB_MOVE;

    if (!gf_xdr_message(&xdrs, movereq, &tohdr, &auth, gf_xdr_request, NULL)) {

        // fail to encode request.
        log_message(ERR, NOCLASS, STR_FUNC_FAIL, __func__, "gf_xdr_message");
	xdr_destroy(&xdrs);
        FREEUP(request);
        gf_xdr_free(gf_xdr_auth, (void *)&auth);
        quickpool_errno = ERROR_XDR;

	return -1;
    } 
    
    char *masterList;
    unsigned int port;
    unsigned int connTimeout;
    unsigned int recvTimeout;    
    if (NULL != master) { // client set master, let's call it directly.
        masterList = master->master;
        port = master->port;
        connTimeout = master->conntimeout;
        recvTimeout = master->recvtimeout;
    } else {
        masterList = qp_getmastername();
        if (NULL == masterList) {
             // JM do not know who is master, let's try g_masterlist.
            masterList = g_masterlist;
        }

        port = g_js_port;
        connTimeout = g_conntimeout;
        recvTimeout = g_recvtimeout;
    }

    char *reply;
    int cc, fd;
    cc = gf_callmaster(masterList, port, connTimeout, recvTimeout, g_connretries,
                       XDR_GETPOS(&xdrs), request, &outhdr, &reply, &fd);

    if (0 < fd) {
        gf_chan_close(fd);
    }
    xdr_destroy(&xdrs);
    FREEUP(request);
    gf_xdr_free(gf_xdr_auth, (void *)&auth);

    if (0 > cc) { // communication in trouble.

        FREEUP(reply);
        log_message(ERR, NOCLASS, STR_FUNC_S_FAIL, __func__, "gf_callmaster", masterList);
        return -1;
    }

    quickpool_errno = outhdr.reqcode;
    if (quickpool_errno == 0) {

        // Got move job reply from JS, decode the new position of the job.
        xdrmem_create(&xdrs, reply, outhdr.length, XDR_DECODE);

        int newPos;
        if (!gf_xdr_int(&xdrs, &newPos, &outhdr, NULL)) {

            log_message(ERR, NOCLASS, STR_FUNC_FAIL, __func__, "gf_xdr_int");
            newPos = -1;
        }

        xdr_destroy(&xdrs);
        FREEUP(reply);

        return newPos;
    } else {

        // JS replied error message, decode it.
        xdrmem_create(&xdrs, reply, outhdr.length, XDR_DECODE);

        char *strErrMsg=NULL;        
        if (!gf_xdr_string(&xdrs, &strErrMsg, &outhdr, NULL)) {

            log_message(ERR, NOCLASS, STR_FUNC_FAIL, __func__, "gf_xdr_string");
            xdr_destroy(&xdrs);
            FREEUP(reply);
            return -1;
        }

        if (NULL != strErrMsg) {
            log_message(ERR, NOCLASS, "%s", strErrMsg);
            FREEUP(strErrMsg);
        } else  {
            log_message(ERR, NOCLASS, "%s: unknown error occurs.", __func__);
        }

        xdr_destroy(&xdrs);
    }

    FREEUP(reply);

    return -1;
} // end function client_movejob
